SHHHHHHHHKKRHHHHHHHRHKHHKHKRHHHHHHHHHRHKHHHHHHHHERRKHRKRRREHHEHEH 


5 + 
5 PROGRAM IDs: DOUBLE DO BOOTSTRAF (COORCUCT) # 
3 + 
SHHEHBHHKHKHHKHKHKRHKHHKRHRHRHRKRHHRKHRHHEKREHKRHKHKHRKREHKHHHRHEERHEEKEEHEE 
స # 
5 VERSION: CRM saz RELEASE 2 # 
5 # 
SHHHEHHHKRHHHHHKHHHHHKEKHHHKRHHHEHKHRKHHHRHKHKRHHHHRRKHHRRHERHRHEEKREEHE 
5 i 
5 DISTRIBUTOR: JAADE COMPUTER PRODUCTS క 
; 4901 W. ROSECRANS ELVL. # 
; HAWTHORNE: CALIFORNIA శ 
5 OE ui. ha Ae + 
3 + 
SHRHHEHPHHHHHHHHHHHHHHRHHHHHRHHHHHHREHHHHHHHHHHRHHHHKHHHHSKEHHRHE 


HHEHHKHHHHHEKHHKHHHRHHHKRERRHHHEHRRHRHHHHRRHRKHHERHRHHHREHEHEHEE 
THE DOUBLE DO BOOTSTRAP FROGRAM (OO0BOOT) IS USED To 
INITIATE THE SYSTEM TRACKS LOAD SEQUENCE FROM DRIVE 
A (OR 0) AND TO PROVIDE CONSOLE [70 SUBROUTINES FOR 
THE DIsSk OPERATING SYSTEM (CR/M). THIS FROM SHOULD 
BE LOCATED AT FOOO HEX. THE SOURCE CODE FOR DODBOUT 
CAN BE ASSEMBLED WITH OIGITAL RESEARCH ASSEMBLER 
ASM.COM. MACHINE CODE Ts so80/8083/2Z250 COMFATABLE 

HHRREHHEKRHRRKHKRERKERKKHHRHRKEHRKHKRHKKRHEKRKEKKEHKRKHKREKRHREHEEREEKE 


28 SS os SS BS WH 8 


Hk హో me Ke ke ఈ 


2౫ 8S 


HHH HH 44 HK H HHH HEH 44 44 EK 4K KKH KH HH KE KKH HK KEK KKH KH HHH KKK HK 
DOBOOT INJECTION MODULE IS COMMAND COMPATABLE WITH # 
THE FOLLOWING WESTERN OIGITAL CONTROLLER CHIPS. * 
DOUBLE DL USER SWITCH O (CLIO OK RO) MUST BE SET TO ¥# 
INDICATE THE CONTROLLER CHIF DATA BUS FOLARITY. # 

HHEHHHKKE PKK KHHKKRKKKKEHKKHKEHHKRKEKEEKERREHKERREEHEHEHEHERE 


SB 38 SS we Ws 


+28 


3 CONTROLLER I WSER SWO % 
Se ee ee a # 
3 Preis oie tL CLOSED % 
5 Pil ses-O2 AOL) OPENED # 
5 FDL 795-02 CLOSED # 
క PUI? 47 Os OR ENED # 
SHERHAHHHHKHHHHREHHHHHHHHKRHERE ERE HRHHHHEHRHEHHRERHREREESE 
> THE FOI7?35-O02 AND FOL797-O2 PROVIDE ENHANCED SINGLE # 
5 DENSITY PERFORMANCE IN THAT THESE CHIFS ARE FULLY # 


COMPATABLE WITH FO1771-01 3740 FORMATS. # 
EHH HHH HEHEHE HK HH HE HHH HHH HH 4H HK HK 44 4 44 4 4 4 HH KH KH KH 4H 4 4 


Ve sa 


FHRHEHKKRKRKRKRKKKHHHKHKHHHHHKHKHKRKRKHHHKHHKHHHHHHHHHHKHHHKRKRHKHRHHHHHEHEHHHE 


5 CBIOS SCRATCH HHHHHH SYSTEM MEMORY ALLOCATICN # 
| HHHHHHHKHHHHRRHRRHHHKHKHERHRREHE EK HRHHKKEHRHKREEREREEES 
5 ADDRESS NAME FUNCT TON # 
క eae siete యా ాాా * 
5 0040-41 DL#EALLK ADDRESS POINTER TO DOUBLE Lt # 
5 0042 DSéMAaAsk STATUS FORT HALT BIT MASK # 
> O04 NS TEMF TEMPORARY, INSERT DISK MSG +# 


> HHHHKRHKRHKRHKRHKHKKHKHRHKRHKRHRHKRHKRHHHHHKRHHHRHHRHRHKHHHRHHREHEHHEH 





J8 Sse Se 


2s 88 We SS se SB WE 


38 88 SS We ws 


38 SS S83 SR WH 8 SWS we 


2a 


fe se WR Se BH wR SE Was Wwe wR ws 


J8 SR 238 CS we WR we BR ws BSE VB VRE wR CR sR WS Se WR ws 


as se 


Je wn Ss 


HHHHHHHHHHHHEHHHHHHHHRHHHHHEHEHHHHRHRHHHHHHKHHHRHHRHHRHRHHHREE 


MODIFICATION MAY BE NEEDED. THIS FROM FROVIDES THE 
CONSOLE STATUS, INFUT, AND OUTPUT SUBROUTINES. MANY 
END USER SYSTEMS REGUIRE UART 7 USART AND BAUD RATE 
GENERATOR INITIALIZATION. THESE ROUTINES MAY NEED 
TO BE PATCHED TO PROVIDE FOR PROPER CONSOLE LINEAGE 
PATCHING MAY ALSO BE DONE FOR SOME DISK ORIVES. 


Xe oe ok ok OK x 


HHEHHHPHHKHHKRKHHKHKRHHHHHRREREHKRHHEKRHHHEHRRHKRHEHRERHKHPRRHKREHREEE 


PROM LOCATIONS THAT MAY NEED FATCHING # 


HHHEHRHHHHHKRHRHHHHKRHHHKHHEHHRHHRKRRHEHHREKRKRHHKRRHHRHREHRRREHEHE 


SYSTEM INITIALIZATION ~ UART/USART, BAUD RATE, AND # 
AND FOWER ON JUMP CIRCUITRY MAY REGUIRE SOFTWARE % 
INITIALIZATION. A PATCH AREA IS RESERVED AT "INIT" # 


HHHEHHHRHHHKRHRHEHHHKRKEEHRHHEHHREHHKHKRRHEHRRKREEHHKRHRRHRHEHRREEEHEH 


CONSOLE STATUS CHECE ~ RETURNS FEYBOARD STATUS TH # 
CP/M OPERATING SYSTEM. ‘THIS SUBROUTINE MUST USE # 
THE CORRECT FORT ADDRESS AND TEST PROPER sTATUS BIT. # 
ROUTINE IS LABELED "CNS$CE" AND CONTAINS FATCH AREA. # 


HEH HHH HH EHH HH HH HHH EH EH HH HH HEH HE HH HE HE EH HH HH HH HK HH HEE 


CONSOLE INPUT — RETURNS KEYBOARD CHARACTER TO CF/M ¥* 
OPERATING SYSTEM. THIS ROUTINE MUST ALSO USE THE # 
CORRECT PORT ADDRESSING. THIS ROUTINE IS LABELED * 
"CNS$IN" AND CONTAINS A PATCH AREA. # 


KHHEHEPRRHRRREHRERHEHHRERKRHHRHHRKRHHKHHHRHRHREHKKRHRKHERHRKHREHEHEEREE 


CONSOLE OUTPUT ~ DISPLAYS CHARACTER TO CONSOLE UNIT.# 
THIS ROUTINE MUST USE THE CORRECT FORT ADDRESS FOR +# 
BOTH THE OUTPUT STATUS AND OUTFUT DATA PORTS. THIS # 
ROUTINE MUST TEST THE CONSOLE QUTPUT STATUS BIT. # 
THIS ROUTINE TS LABELED "“CNSS0OT" AND CONTAINS A # 
PATCH AREA. # 


HEHEHE HHH HHH HH HHH EH HHH HH HHH HHH EHH HH 4H HHH HH HH HH HHH HHH 


BOARD REVISION ~ NOTE SOURCE FILE HAS CONDITIONAL శ 
STATEMENTS FOR BOARD REVISION. REVISION & BOARDS # 
MAY BE MODIFIED TO ACT AS REV-C (CALL JADE) OR # 


DOBOOT MAY BE PATCHED. PROM IS FOR REV-C. # 
cores wens wears cutee cones wnaee eres weser eutee cores wteee SOGee cence అరిలిలలి Lines epee coete verte Seems cance Snes SneEG SrECE cheeD GeueO Semee HeEre RatEO REGED EELES Freee SEED suEE eEnES euEED వినని cetES Otte ater ceEDe execs ఆలూరి seen ecsoD sete weues cases Lenca soDED seme జలం Boa 
ADDRESS NAME FUNCT LLIN REV Reve # 
meee enone 00593 29000 waved ences conse estes eevee అంతం coven cease eeene అంతల secon wetes cree eseee ఆసలు eaves execs 42099 scsee setee అలల ences eevee cess అలరి + 
F040 DS$sAsW ADDR SW MASE OE Oc # 
FO43 QDNSBASE ADDR SE RANGE EO E4 ## # 
FO4E DSé$HLT OO HALT BIT Ol Om # 
cece conse sesee Leute eneas omnes score conse antes voce secee oneee cease conse suse sees రజల teres లలల లకి. అరక మలల coste లల conan అరా wosen నరక aarov వనర stage eveee seven wes అలర. toute sents rane sees cones eens minus cusse లన అరల senna అంతల cents sone coors eeeee offs 
## SHOULD BE "EO" IF MALO JUMPER IS INSTALLED. # 


HHEPHHKRRKHHHKRKRHKHKRKREHRHHRHHEREHKHKRKHKRHRHHHHKHKHREHKHHHHHHHKHHHEHEHEHRER 


Clk ORIVES ~ DOBOOT IS USING A 10 MILLISECOND STEF # 
WHICH WILL HOME THE R/W HEAD ON MOST DRIVES. IF THE * 
USER DRIVE IS MUCH FASTER (SHUGART SASSO GR SIEMENS # 


FOLOO-S0) THEN THE STEF RATE CONSTANT MAY BE FATCHEL + 


NOTE: A DOBOOT PROM PATCHED FOR FAST DRIVES WILL = # 
NOT FUNCTION PROPERLY IF LATER USED WITH SLOWER # 
DRIVES. SLOWER STEPS SHOULD ALWAYS WORK. A DELAY + 
REFURE READING HAS BEEN PROVIDED FOR HEAD LOAD TIME # 
AND CAN BE USED FOR DRIVE-MOTOR START UP TIME WHEN + 
THE DRIVE MOTORS ARE CONTROLLED BY THE DCUBLE-DI. # 
ss Shs al ul sre ees San cela ile Ney wind Wun ets oi sia‘ pi Cen sal ch eho eed ee in gh es a cela soe Aad rer oe + 
ADDRESS NAME FUNCT ICN # 
mse tee Renn sales ఇ వ + 
FICE-F1CF IM$TM$STF = STEF TIME # 
FIF7-F1FS IM$TM$0BR DELAY BEFORE READ # 


FOOO 


QO4 3 


OOO] 
OOOO 
OOOO 
OOD] 


COO 


రత ఆకరి కలీ 


0001 


QOQE 


OOO 
౧౧40 
0042 
004% 
O377 
O375 
OF7 


OOO 


HoH OW 


SHHEHHKKHHHHHHHHKHHHHEHHHHKRHHHHHHHRKRHHHKRKHKHHRRREHHHHRHEEEE 


SHEKHAR HHHHRHEHHHHHRHHHHHHHHHHHHKHRHHHEHRHR HHH KKH HK 
> DOUBLE DO BOOTETRAF SYSTEM ADURESS # 
J HHEHHHHHKHHRHKHHHHEHKHRHHKRRHHHHHHRRHKRHHHRHRHRHHKRHEHHHHHHREE 
FPROMSADDR El OFOOOH FDODRGOT SYSTEM ADDRESS. 
SHHERHKEHHKKHKEHHHHHHHEHHHEHHERHHERHHRHHHHHHEHERHRHHERHEHHHS 
; SET DOUBLE D SYSTEM FORT ADDRESS # 
SHHHHHHHERHHHHERHHRHHHHHHRHEHHHRERHRERHRHHERHHHHEEHHHHREHEH 
DSPORT Ell O4-3H SOOUBLE OF FORT ADDRESS. 

| HHHHHEHHHHRHHHRHHKKERHKHEHRHHKHEHHRKHERHHHERHHHHREHHRHHRHEE 
5 SET USER DOUBLE DO BOARD REVISION # 
SHHEHKHHHHHHHHHHHEHHHKHRHHHHRHRHHHRHHKHRHKHRRHHKRERHHRRHHHREHRHHEE 


TRUE Fil i GET TRUE FO LOGIC ONE. 

FALSE E till 0 SET FALSE TO LOGIC ZERG 
REVSE EG FALSE EET TRUE FOR REV E BOARDS. 
REVSIC EGU TRUE EET TRUE FOR REV CC BOARDS. 
MALO Ei FALSE 7; TRUE IF MAIO JUMPED (REV-B). 


S HHKHHKHHHRHKHEKHHHHKHHHHKHHREHHEHHRERKKHRHHRKERHHHHEHHKHERHH 
5 DEFINE HALT MASK AND BASE ADDRESS OF DOUBLE Li # 
| FHHHHHKHKHEHKHKKHHRHKHHKHEHHERHERKHHKHHEHHERHHHHHHHREHHEHESH 


IF REVEé#E 
DS$HLT Elli OOH SSTATUS FORT HALT INDICATOR. 
NS¢Asw ECL GOOCH SSTATUS FORT ADDR SW MASE. 
UtéBAsSE SET OE400H sSSYSTEM WINDOW BASE ADDRESS 
ENDIF 
IF MALO 
NSéBAsE SET OEQOOH sSSYSTEM WINDCQW BASE ADDRESS 
ENDIF 
IF REVS: 
DOS$HLT Eu OO1H SSTATUS FORT HALT INDICATOR. 
UStAsw Equi OOEH STATE FORT ADDR SW MASK. 
DOSBASE SET QE OOOH sSYSTEM WINDCW BASE ADDRESS 
ENDIF 


FHHHHHHHHHEHHHHHHHHHHRHRHEHHHHHHKERERERHRHHHHRERHEHEEEHHRHHHHEHEE 
5 BOOTSTRAP LINEAGE ADDRESS. శ 
S PHHHHHHHHEEHHHHHHEHREHRHHHHHKHKREEHHHHHRHREHRHHHHRHEHHHEHEREE 


BRSTACK Etill OOOH 5 BOOITETRAF TOF OF STACK. 
OSAnorR EGU O040H SDOUBLE DO ADDRESS POINTER. 
DSMASK EGU O042H SDOUBLE OD HALT BIT ADDR, 
DSTEMF Et QO04-3H SDOORBOOT TEMPORARY LOCATION. 
BLéO0CS EG O377H SCM DISK CONTROLLER STATUS. 
BLéADRK EGU O37 3H LOM LOAD AND JUMP ADDR FNTR. 
BLSBsZ ECG O37 AH SLUM BLOCK LOAD SIZE. 

EL$LINR EGU OOOH 5LIRIVE NOT READY EIT. 


FHHHHHHHHHHHHHRRHHHHHHHHHHHEHHHRHKHEHHRHHHKRHRHHRKHRHRHHHEHHEE 
; DOUBLE Lr HARDWARE COMMANDS + 


OOO 
౧001 
౧00౧0౦ 
O01 
౧002 


FOOO 


Fooo 
FOOS 
FONG 
FOO? 
FOOL: 
FOOF 


Foiz 
FOLS 
FOLA 
FOLE 
FOL? 
FOSS 
Foz 
FOSE 
FOSS 
FOs4 


FOIA 
FOr 
FOSF 
F041 
Fo4> 
F044 
Fo4s 
FO47 
FoO4a 
FO4c 
FO4F 


fot tt O53 tg 
fat 
i he 
BA 
Sa 


SP SPO 
S10F 1 
S2FF 1 


7 9 Tm 


at Gi 


ca 
f 


pe pita phe oo pe pe రిల 
en ee 96 
22. 5% 28. 00, 6h 00, sa, 00, 
ss ‘69 Meet © ee oe 6" "64 
eo pt, 98. 48 89 200, రితి పెకి 
eo ee" ee ce “eo” Yeo" “eo! 
>, 2% 40%, 200. 280. 00, 00, 00, 
aoe eS 6 "69 "69 
కర పలికు oe pe 2%. 2% nO, ఎలి 
eo" Neo” © we a9 
=, 5 28, AU FU AU AU 
le" 39° eo” eo ఉల "9లో 


అలి 8, 200. 8 200, 200. ఏకె ఏరిన 


3218000 
DB43 
E6OE 
O7 
FEO 
&7 
ZEOO 
224000 
SEO1 
324200 


B24300 


SHHEHHHHHHHHHHHHHHHKHHHHHHHHKHHHHHHHKKRHHHKHHHHHHHHHHHHHEHEEE 


DCSRGN EGU QOSOH RESET ZS0A AND EXECUTE. 
OCSMRe EGU QOO1H SREGUEST MEMORY WINDCW. 
QOCéMRT EGU GOGH RELEASE MEMORY WINDCW. 
DOCéMBO EL QOO1H SELECT MEMORY BANE 0. 
DCSMBi EGU COOH SELECT MEMORY BANE 1. 
QDCSEXC EWU OOH ;ISSUE DOUBLE O INTERRUPT. 


SHHEHEHHE KHER KHRHKEHHRHRHKEEHEKKEHHR KEKE RKEREEKEREERRERHRERHREREE 
; ASSEMBLER DIRECTIVES * 
SHEEHHEHHHHKHKEHH HEHEHE RKHHEHAERERKERKERKEHKERERHRHEHEEEH 
ORG PROMSADOR SMODULE ADDRESS. 
SHHEHHEHHEHHHEKEHKHHERKERE RHE KKK REHKERKEKERHKHEHRERHEHHERHE 
5 DOBCOT FUNCTIONS VECTOR TABLE # 
J HHHEHRHHHHHHKKRHKHHKEHEHERHEEHEHREHERREHH EHH EHKEHKEREHREE 


IMF INIT INITIALIZE AND ECT, 
MF BOUT SREBOOT DISK SYSTEM. 
ME: CNSéCK sSCONSOLE STATUS. 
MF CNS IN CONSOLE INFUUT. 
IMF CAST SCONSOLE OUTFUT. 
MF MSBG$0T SMESSAGE TO CONSOLE. 


S HHEHHHHHHHHHHEHKHHKEHHHEHHHEHEHHREHHRHHERHERHRERHERHKEHHHHRERE 
5 INITIALIZE SYSTEM HARDWARE —~ USER FATCH AREA జ 
5 HEHEHE HHHEHEHHHHHHHKHHHHHH 


INIT: NOF NOP ! NOP ! NCF ;FATCH AREA. 
NOP NOE ' NOF NOP 7FATCH AREA. 
NOP ! NOR ! NOF ! NOF SFATCH AREA. 
NOP NOP ! NOP NF FATEH AREA. 
NOP NOF ! NOP ! NOF 7;FATCH AREA. 
NOP NOE NOE TNF SFATCH AREA. 
NOP ONOF NUOF ! NOF SFATCH AREA. 
NOP} NOP NOP ! NOF FATEH AREA. 
NOF NOP ! NOP ! NOF SFATCH AREA. 
NOP NOE NOP ' NOF FATEH AREA. 


| HHHHHHHHEHKHHHHERHHHHRHEHKHEHHHHHERHHKRKRRHKEHRHHKHREEHHHEEEH 
5 SET STACK AND DETERMINE CONTROLLER ADDRESS # 
SF HHHHHHHKHEHHHKHHHHRHEHRHKHERHHKHKHEEHHHKERHHREHRHRHHHRHHHHHREREE 


ECT ay ay! GF, BSTACE ET STACK POINTER. 
IN DSPORT IINFUT STATUS FORT. 
ANI CSsASW MASK FOR ADDR SWS. 
RLC 7FOSITION BITE. 

ORI QSBASE SHR & SLR IN BASE ADDR. 
Mov HA HIGH BYTE VALUE. 
MVI L200 LW BYTE VALLIE. 
SHLD Lé$ALLK TORE THE ADDRESS 
MV I A» OSSHLT ;LOAD HALT BIT MASE. 
STA DSMAsk. STORE FOR BIOS USE. 
STA DSéTEMF EET REPEAT FLAG NZ. 


5 HHEHHHEHKKHHERHHKEHHHEHHERHHERKEHRHKERHKERHKEHHEEEHRHEERE 
5 INJECT BOOT MODULE INTO CONTROLLER # 
FHRHHHHHHHKHEHHHHHEHKHHHHHKHEHHERRHERHHEHHHEHHHREHRHRERHHEHE 


FOUS2 
FoOs4 
FOSS 
Fosy 
FOSA 
FOSE 


FOGO 
FOG? 
FO44 
Fo6s 


FOGG 
FO4? 
FO6A 
Foal: 
FOéD 


FO7O 
FO7S 


F074 
FO?77 
FO?7A 
FO7B 
FOo?7C 
FO7E 
Fos 
Foss 
FOSS 


FOSS 
Fos? 
Foul. 
Fost 


FOSE : 
FOSF ! 
FovO ; 


FO?! 


E01 
[aga 
OL1ceaoo 
EE 
Z1IS4SF 1 
COA4FO 


SEBO 
D345 
Es 
Eo 


SA42Z00 
47 
DB43 
AQ 
CSGAFO 


SEO! 
Ds433 


ZA4000 
L220 
1» 

7E 
EéSO 
C2B1FO 
"ee 

A7 
C2CSFO 


ZA4000 
117503 
1? 
SE 


& hi UA ha 
MG 03 


INJECT? MVI A» OCSMEBO SREGUEST DOO MEM BANE ©. 
LIT DSPORT 5 ISSUE COMMAND. 
LXI B,IMSEND-IM#BGN INJECTION MODULE SIZE. 
XH SOS$AD0R HL TO LIE. 
LXI H» IMSBGN SINJECTION MODULE ADDR. 
CALL BLOCK SELLE MOVE. 


SHHEHHHHHHEHHHHHEHHHHRRHHHHHHHKHRHKHEHRHHHHEHRHHHHHEHHHHHHEHHH 
; RESET AND START THE DISK PROCESSOR # 
SHHHHHEHHHHHRHHHHHHHHHEHHHHHHHHHKEHHKERHHKHHEHHHHHRHHHHRHEHHEES 


MVI A» DOCSRGN ;BEGIN OO FROCESSOR. 
OUT QNSPORT ISLE COMMAND. 
XTHL ALLOW DOUBLE Lr TIME 
XTHL 770 START UF. 


SHEHHEEHHHHKHKKKHEHHKEEEHHKERHHREEHKKEERHRHEEHHRHHHEEHHHEEEEE 
5 WAIT FOR TASE COMPLETION # 
S HHHHHKHKKKKHHKHKERKKKKKKE KERR KKRHERERHRHHHKREEHREREHRHHHHE 


LOA DSMASE HALT BIT MASE. 

Mav B.A SMOOVE INTO B REG, 
WAITS: IN OSPORT SINFUT DOO STATUS. 

ANA E TEST HALT* STATUS. 

IN Z WAIT SWAIT TILL HALTED. 


DS HEHHKHREHHKKERHKHHHHKEKHRHKEERKKEERHRKHERRHKEERRHKKERRHREEE 
5 SWITCH CONTROLLER MEMORY INTO SYSTEM BUS # 
S EHHHEHHRKHHHKHEHHKKKKHHHKEHHKKREKRKKERKRHKHEERHHRKEHHHREHEH 


MVI 
CiliT 


A» DCSMRt 
D$PORT 


7REGQUEST MEM CBANE 0). 
ISSUE COMMAND. 


FS EHEHKHHEREHHHHHKEHHHHHRHHEHHRHHERHERHREHRKEHERRERHRHRHERHERE 
> CHECK FOR BOOTSTRAP MALFUNCTION * 
FS EHEEHEERREERHREREREHRHHERRHRREHHHEHERHHHRHHHHHHHHHHHHHHH 


LHLL LIé#ALLR CONTROLLER ADDRESS. 
LAL Li, BLéocs ERROR CODE IM$EGN. 
DAD Li GET HL POINTER, 

MoV AM HET ERROR CODE. 

ANI BLSUNR sTEST DRIVE NOT READY. 
IN Z INSERT 71F DRIVE NOT READY. 
Mav AM GET ERROR CODE. 

ANA | TEST REGISTER. 

IN Z BADSLO 5 EAL LOAD. 


5 HHHHHHHHHRHHHHHHHHHHHRHHHKHKHERHHHHHRHHKHEHHRHHHHHHRHEHERHHEE 
5 PERFORM BLOCK TRANSFER FROM DISK MEMORY * 
RHEE HHHH KH HH KH HK HK HHH 4 HK HH HHH HHH 


LHLO DSADOR CONTROLLER ADDRESS. 
LXI Li, BLSADR LOAD ADORESS FNTR. 
DAD [i SET HL POINTER. 

Mav E3M SLOW ORDER ADOR. 

INX H 5 INCREMENT HL. 

MoV Li, M HIGH ORDER ADDR. 

INX H SREGHUIIRES BL.BSZ NEXT. 
Mav C 


‘3M SLOW CGROER LENGTH. 





Fos 
Foc 
F074 
Foye 
FO? 
For? 
Fore 


FOF 
FOAL 
FORA 


FOR4 


FOAS =: 


FOASG 
FORA? 
FOAS 
FOA 
FOAA 
FOAER 
FOAC 
FOAL 
FORO 


FOR 
FOR4 
FOES 
FORS 
FoR? 
FORC 
FORF 
Foc2 


Fors 
FOCS 
FOCE 
FOE 
FODI 
FoOD4 


శు wat 


46 
[iE 
SE OC 
Ds4c3 


ZA4O00 
COA4FO 


SEOIL 
[a4 


Co 


INX H 7; INCREMENT HL. 

Mav BM HIGH CRDOER LENGTH. 
FLUSH Li SUSE AS LMF ADDR. 

MVI A, DCSMB1 sSWITCH TO MEM BANE 1. 
QUIT DSPORT SISSUE COMMAND. 

LHLLI LéEALLR LCUELE DO MEM ADDRESS. 
CALL ELLIE. MOVE BIOS MODULE. 


SHEHHKHHHHHHHHHHEHRHHHHHHHERHHHKKHERHRHHHRHHHRHERHERHHHHHHHHEE 
5 TRANSFER CONTROL TO OPERATING SYSTEM + 
SRHEPHHHHHHEHHHKKRHEHHHHHHHHHHEHHHHKHKHEHEHHHHHHHHHEERHEHHHHHHHHHE 


MVI A» OCSMBO SWITCH TO BANE. OQ 
OUT DSPORT 7; ISSUE COMMAND. 
Mier GOTO BIOS COLO ENTRY. 


SHEPHHHHEHHHHHHEHHHHHHHKHEHHHHHKHHHHHHHHHHHRHHREHHRHHHHHERER 
5 BLOCK MOVE SUBROUTINE (Z80 BLOCK MOVE REGISTERS) # 
SHHHEHHHHHHHHHHHHHKHHHHEHHHHHRHHHHHHHERHHHHREHHHKHHEHRHEE 


TE 


ఎ tat 


EE 
77 


get) ళో 
జే 


EE 
OE 
73 
Ei 
CEA4FO 


ce 


SA4300 
A? 

CAISFO 
AF 

324300 
Z1S3F 1 
COSFF 1 
CSS2FO 


324300 
Z146EF1 
CDZFF 1 
344300 
COSEF 1 


BLOCKS MOV ALM GET BYTE. 
INX H SIN POINTER 
XCHG GET DESTINATION. 
Mov MA PUL Byte. 
INX H INL POINTER 
ACHG (GET SOURCE. 
Cie x E SOINE LESS To LU 
ML AB GET HI COUNT. 
CRA C GET LO COUNT. 
INZ BLOCK 7FINISH LOADING. 
RET 


SRHEKRREHKHKHREKRHKKEKRKRHRHRKHHEKKRHKKREEKHEKRHEHHKRHHRHKHRHRKREKEKHRHEREKEE 


5 DISk 


DRIVE Is 


NOT READY 


% 


5 HHEKRHKRKEKRKRKRRKHKHRHKHHKHKRHKHREHRRRKRKEHHHREHEKRKRHERKRKREREKERHRHEHRHERE 


INSERT: LOA ls TEMP LOAD INIT FLAG. 
ANA fe sTEST FOR INITIAL. 
whe INJECT STRY BOOTING AGAIN. 
XRA By sZERQ A REGISTER. 
STA CéTEMF CLEAR INITIAL FLAG. 
LxXI H»MSGSIN Ss INSERT MESSAGE ADDR, 
CALL MSoso,t sSQUTPUT MESSAGE. 
IMF INJECT TRY BOOTING AGAIN. 


5 HEHEHE HEHEHE EHH HEHEHE HHH HHH HH HH HHA HH HH HHH EHH 


; DOUBLE £ 


BOOTSTRAP MALFUNCTION 


# 


SS RHEE NEHA HEHEHE HHH HEH HEHEHE HEE HHH HHH HHH 


BADSLO:S STA Lié TEMP STORE ERROR CODE. 
LXI H»MSGSER SERROR MESSAGE ADDEESS., 
CALL MSGSOT SDOISPLAY MESSAGE. 
LIA QS TEMP 7;LOAD ERROR CODE. 
CALL HXBSOT ;DISPLAY HEX BYTE. 


HLT I NOP NOPF 


SHALT OR JUMP MONITOR. 


sHHHHKKRHHHRHHHHKRKRERRKRHHHRHRHKRHHHHHKHHHHHEKRHHEHHKHHHRKRHHHHEHKHEHEEHE 


> 06 CONSOLE INFUT AND QUTFUT 
HHHEHHHHEHHHKHHHRHHHHHHERHHHERHEHKREHERHKEKRHEHHHEHRHERHEEEE 


# 


# 


OOOO 


OOOO 
0001 
QONQQ 
౧004 
౧౧000 


0001 


FoOL7 
Fou? 
FOLIE 
Foon 


FODE 3 


FOEO 


FOE 
FOE? 
FOED 


FOF S 
FOFA 
FOF? 
FOFE 
FOFD 


FOFE 
F104 
F1OA 


Fiio 
Fiiz 
Fii4 
Fild 
aoe fe ie 
F1iAa 
Pia 


Fiit 
Fis 


CEO 
EFEQO 
E4602 


oo, 20. 25, 200, .80 .69. 00. 00, 3. 80, 
అత్ని 2%, 28. 280, 280, 206, 0, .00, wh, 20, 


COO7FO 
CAF SFO 


OOOO 
0000000000 


02, 28, 299, 20, 90, (09, 200, 00, 208, 90. 


OOOH ILI) 


[LEO 
EEQO 
E404 
CALOFI 
7? 
[i201 


DG00000000 


5 XxxssP: 
5 XXX$SB: 
; XXX$S15 
5 XxxxsoF: 


CNISsr 
CNI$S5 
CNI¢sl 
CNISOF 


NOS Sr 
CNOSSE 
CNOSS I 
CNOSDF 


Emil 
Frill 
Eri 
Eri 


Ercill 
Emil 
Fil 
E Gill 


STATUS 
STATUS READY BIT 
IF READY TRUE Is 
DATA PORT ADDRES 


QQOH 
COOH 
OOOH 
GOTH 


OOOH 
OO4H 
OOH 
OO1H 


FORT ADDRESS 


ns DS 


USE "OO" ELSE "FF" 


Mee 


HEHEHE HHH HHH HHH EEE HEHEHE HHH HHH EK 


5 INFUT 
5 INPUT 
> INFUT 
5 INFUT 


STATUS 
STATUS BIT. 
STATUS INVERT. 
DATA FORT. 


FORT. 


s OUTPUT 
5 CUITRPUT 
5 CHITE'LIT 
SOUITRLUT 


STATUES 
STATUS BIT. 
STATUS INVERT. 
DATA PORT. 


PORT. 


SHHKEHHHHHEHHHHRHHEHHEHHHRERHRKEHRHHHRHEHRHKHERHRHHEHRHHHHEEHHHEHE 
5 CONSOLE INFUT STATUS CHECK 
SHELHHHHEHHHHHEERKHHHRKKKRRHHHHREHHRRKRHRERERHHHHEHRREEEE 


CNSScCk s 


IN 
XRI 
ANI 
RZ 
MVI 
RET 


LIE 
LIE 
LIE 


CNISSF 
CNISS1 
CNISSB 


A» OFFH 


0,0;0,0;:0,0 


0,0,0:0,0,0 
0,0.0,0,0,0 


#% 


SINPUT STATUS PORT. 
SADWUST POLARITY. 
TEST READY BIT. 
;ZERO IS NOT READY. 
EET CONSOLE READY. 
CINE INDICATE READY. 


5 PATCHING 
5 FATCHING 
7FATCHING 


AREA. 
AREA. 
AREA. 


SHHHKEHHHKHEHHKEHHKKEKKKKEHKKEHHRKKERHHREHHRHKKERRHRHRRERHEEE 
; CONSOLE DATA INPUT 
S HEHHHKKKHHHKKEERHKKHKHKERHHHHKKEHHHHKKRERHRHRRHRHHHREEREH 


CNSSIN: 


CALL 


we 
IN 
ANT 
RET 


LIE 
LIE 
LIE 


CNSSCK 
CNSSIN 
CNISDF 
O7FH 


92020203020 
0,0,0,0,0,0 
0,0,0,0,0,0 


% 


;TEST INPUT READY. 
SREFEAT TEST FOR RLY. 
INPUT CONSOLE DATA. 
7;SEVEN BITS OF ASCII. 
RETURN WITH DATA. 


S;FATCHING 
5 FATCHING 
$ FATCHING 


AREA. 
AREA. 
AREA. 


J HHHHHHHHHHHHHHHHHEHHHHHHHERHHHHHKEHHEHEHHHERHHEHRRRERRHERHEH 
5 CONSOLE DATA OUTPUT 
5 HHHHHHHHHKHHHEHHHHHHHEHHKERKEHKHRRRHRRRKRHHRHHRRHRHKHHRRHRHES 


CNET s 


CNOSSF 
CNOSS I 
CENCE EE 
CNET 
AC 

CNOS OF 


0.0,0,0,0,0 
0,0,0,0,0,0 


% 


SQUTPUT STATUS FORT. 
sADIUST POLARITY. 
TEST READY BIT. 
TEST AGAIN FOR ROY. 
SQOUTPUT SETUP, 
SQOUTFUT CONSOLE DATA. 
s;RETURN COMPLETE. 


;PATCHING 
PATCHING 


AREA. 
AREA. 





Fiz? 


FLSF 
Fiz 
Fizz 
F133 
F134 
F137 
Fis 


F1i3E 
Fisc 
Fi4o 
Fi4s3 
F144 
Fi4é 
Fil4s 
Fi4k 
F141 
Fi4Fr 
Fi SO 


Piss 
FIGe 


OOO 


COA 


OOOO 
CHO) 
OO04 
MO04 


ఆతు pM oh, 2, =. ., =. =. ఏర Af, 


AF 


COLOF 1 


2 


Seer 


a 


OF OF OF OF 
CO44F 1 


Fil 
E4OF 
FEOQA 


CA4LF 1 


CeO? 
AO 
4 


Calor i 


OLOADAALYAEMSGEHE IN: OB 
OLOAOA4L444MSGEHEER: LIE 


LIE Seer SFATCHING AREA. 


SHEEHEKHRE HERR E HEHEHE ERHEREEERHEEEHEEEHEKHHH 
5 MESSAGE DISPLAY ROUTINE ~ HL REG POINTS TO STRING # 
SHEEHKEHHEHHEEHEEREKEHREEH RHEE H HERE HRREKREHHERHHHEHHRHEEEEHE 


MSosaTs MOV AM LOAD CHARACTER/BYTE. 
CF I జ SCHECK FOR TERMINATOR. 


RZ EXIT IF TERMINATOR. 


Mov CA PALE BYTE IN C REG. 
CALL CNET SOISFLAY CHARACTER. 
INX H sFPOINT TO NEXT BYTE. 
IMF MSGSOT SREFEAT SEQUENCE. 


SHHKEHKEHEEHHEHHHHHKE RHEE HREHHERHREHHEHHEHHHKERHRRHHEREH 
5 DISPLAY A REGISTER IS HEXIDECIMAL # 
SHHERHEHHEEHHREHKHEHHHKRHHERHKERKEREHEEHHERHHRHHHEHEREREHRERH 


HXESOTS FUSH Pow 
RAC RRC IRR RRC 


7;SAVE A REGISTER. 
SHIFT 4 PLACES. 


CALL HXNS$OT SOISPLAY HEX NIBBLE. 
POF Pow RESTORE A REGISTER. 
HXNSOT:S ANI QOFH MASK LOWER NIBBLE. 
CPI QOOAH Pino! £F LETIERN HEX: 
JC HXNSNM SDISPLAY NUMBER. 
ALT ee ALL LETTER OFFSET. 
HXNSNM: ADT or sSTART WITH ASCII 0. 
May LA sQOUTFUT BYTE TO C REG. 
IMF CNET SCONSOLE OUTPUT. 


5 RRR HEHEHE HEHEHE EEE HK EH EHH EH HEHE HEHEHE HELE HE 


5 SYSTEM BOOTSTRAP MESSAGE AREA # 
SHEHHEHEHHKKKEHEHKHEHKERERKERH ERE RH ERKEHHERHERRERHERHEHRHE 


LAs Le sLrs INSERT SYSTEM DISKETTE “»"S" 


CR,LF»LF. “OOBOOT LOAD ERROR — “; °°" 
CR E Gil QODH ;CARRAIGE RETURN. 
Lr Etiu QOOAH LINE FEED COMMAND. 


S KHHHKHHHKEHHKKRERHHHEHHKHEHHKHRHHHKHHHRHHEHERHHHRHHERHHHEEE 
S$ HHEHHHKKHHKKERKKKEHHHKKHERKHKHHHKEHERRHHEHRHHKHEERHERHHRHEERHRHREEE 

INJECTION MODULE ### THE FOLLOWING EXECECUTES IN LL # 
HHEPRHKHHHHKEKHKKHERHHHEEHHKKERHHKEERHHEEHHRHHEEERERHRHHEEESH 


48 sk 


5 THIS SECTION OF CODE IS HAS BEEN WRITTEN WITH AN 4 
; ADDRESS OFFSET SO AS TO ASSEMBLE WITH IM$BGN AT జ 
5 LOCATION ZERC, # 


5 HHKRKKKKHKHKRKRKEHHKHKRHEKRKKHHHKKRHKHHKRKRKRHHRHRHRHHKRKREHKHRRHHKHEKRKREHEER 
SS LRH HEHEHE KH HHH EHH HH HH 


| HHHEHKEKHKEHEHKEHKERKHRKHRKERHERHRERHKEHKERHHERHHEERHEERH 
$ DOUBLE O INTERNAL FORT ASSIGNMENTS + 
FS HHHHERHEHKKERHHHHKERHKHKHHHHHKHHKEHHHEHKKHKHKEHHREHRHHEEH 


IM#BL$sTs Ei OOOH sRBOARD STATUS 
IM$BLSCTL Eau OOOH SROARL CONTROLS 
IMSWOScmg Etill OO4H 179% COMMAND REGISTER 
ete EG QO4H  3179X STATUS REGISTER 


Q008 
OO07 
OOO 
0010 
0040 
0030 


Oo 
Oo ve 
OOTIO 


Z1Fo 
45 EC 
ESF OI 


O001 
O004 


QO0A 
OOZES 


Oo04c 


QO00d0 
0400 
O400 
OEE 
O376 
O37 7 


ho Ut 


IM#wos TRE ELilt CoH 51772X TRACK REGISTER 
IMSWOSSEC EGIL QOO6H 3;177X SECTOR REGISTOR 
IMSWOSOTA Et QO0O7H 3177X DATA REGISTER 
IMSXP#STR EGIL OOH SGTEFFER PULSE 
IM$XFSMTO ELill QO1OH MOTOR TIME CLIT 
IM#XFE4MT X Fit O40H MOTOR TIME EXTEND 
INSXFP SOSH ELill OSOH DATA SYNC HOLD 


SHHEHHKHEHHHEHHHRHHKERHKERHKERHEHRHHHEHKERHKHEHRERHHHEHHHRERHEE 
5 17"X-O2 COMMAND CODES # 
SHHCHHEHKKHHHHHHERHHEKHKKRHHHEHHHERHREHRHHHHHEHHHEHEHRERHEHREE 


IMSOCSHOL Fiat QOOOLIO00R sLOAD R/W HEALD. 
IMSOCeéRMS E till 1O011O00R ;READ MULTI-SECTOR. 
INtocssTS Ett 11010000BR FSET TYFE 1 STATUS. 


SHHEHHHHHHEHHHHHEREEHHHHHKKEHRHRHHKKKHERERHHHKHHHRHEERRHHHHH 
5 280 INSTRUCTION HEX CODES —~ NOTE HI/LOW ORDER SWAP # 
SF HHHHHHHKERHKKHKHERHHHHKKKHEERRHHHKHEHHEHERHHEHHHHHHHREHRHEHHHEE 


IM@LXTY Eau QO21IFOH sLOAnD Y REG IMED. 
IMSRETN EG O4SE0H sRETN (NMI RETURN). 
IM#XTIY E Gi QOESFOH FEXCHANGE (SF) <r TY. 


SEHK HHH HHH HKERHEHR EKER KEHKEHKRHERKEHHRRHKREHRERRERREX 
5 BOARD STATUS AND CONTROL FORTS # 
SHHHHKKKEHHRHHEHRHHEHKEHRERKRHHREKEHKHEHHKRHEKHKERHREHKERHEEH 


IMSBS$uso Eri OOLH 
IMNtBCHORO EGU NOAH 


,17?X-O2 POLARITY TEST. 
[RIVE O SELECT/ENABLE. 


SF HHHEHKHHKEHHHHHHHHHHKHHHHHHHHHHHEHHRHRRHHHRHHEHRHEHHHRHRHHHHHEE 
5 DISK STATUS MASKS # 
5 HHHHHHHHHHHHHHKHHHHHHHHHHHHERHHHRHHHEHREHRHRHHHHHEHHHHHEH 


IMSO0MSRER EGU LOO1LIOOR REAL ERROR TEST MASE. 
IMS0M$TREO EGU OO000100R TRACE O TEST. 
IMSOMSONK EG LOOQOOOOR 5LRIVE NOT READY. 


| EHHKERHKKEHHHERHAKEERHHKERHHHERHHHHERHKHRHHHHRHHRRHHREEESH 
; DISK ORIVE PARAMETERS # 
S HHHKHHHKKHHHKHHHHHHEHHRHHRRHHRHRHHKHHHRHKHERHHHHKEHHHHEEE 


IMSTMSSTR ECL 10 STEPPER INTERVAL — MS; 
IMS TMSOBR E til 41) SLELAY BEFORE READ- Ms. 
IMSNBS TRE E Gil 7G MAXIMUM NMBR OF STEPS. 


SHHHHKHHEHHHEHHHHEHHHKERHHKERHHHEHHHKEERHHKHERHRHHRRHEHHHHREES 
5 INTERNAL MEMORY ASSIGNMENTS # 
5 HHHEHHHHHHEHHHHRHHEHHKHEHHHEHHHRERHERHHEERHREHRHHRERRHERHEEREE 


IMSBEO EGU OOOOH SLOWER BANE ADDRESS. 
INSBEL Ell = O400H 71K BANE LENGTH. 

IMSBE 1 FOU IMS$BRO+IMSBEL SUFFER BANE ADDRESS. 
IMSNmI EG IM$BEO+00466H >NON-MASEABLE INT ADDR. 
IM$SBLSERC EMU ®IMSBRO+02746H ERROR CODE LOCATION. 
IM$BLSOCS EU IM$BRO+BLS0C5 sOISK CONTROLLER STAT. 


5 HHHHEEHHHEEHHHHHHHHKERHKKRHEHHHHKHRHHKHREHHKRHRERAHHREERHHHEE 
> BOOTSTRAP COMMUNICATION # 





౧001. 


DOLE! 
0004 


QoQog 
Q4o%3 
O400 


F liza 
Fis? 
Fiske 
Fist 
Figer 
Fivi 
Fivd 


Fivt 
F1lAQ 
FIA 
FIiA= 
FIiAS 
Fla? 


FiAc 
FiAg 
FIAF 
FiEl 
F1IBS 
FIRES 
F1B?7 
FIRS 
FIERA 


310004 
DR40 
OEOO 
DBOO 
EGO1 
C21000 
ORFF 


COLE 


3E04 
LES00 


COS 
327703 
EGSo 
CAZ600 
AF 
CSB100 


713 
O30 
D307 
FOS1 
23700 
|e 
AY 
D304 
C33400 


SHEKHHHHHHHHHEHHKEHHKKRHHKRHHHHHKHHHHKHHHRHHHRHHRHHERHHERHREREE 


BESHOM = ECHL QOO1H HOME ERROR. 
BE$ROA EGIL OOZH REAL ERROR A. 
BESROR EWU O04H REAL ERROR EK. 


SHHEEHHHKEHHHHHHHHRHEHRHRHHHHEHEHHHHKHHRRERHHHHRERRHHHHHHHHEE 
5 DISK CONTROLLER MODULE (OOM) LINKAGE # 
SEEHHHHKHHEHEHHHKKKRERHHRKKHHHEHRHKHHEHRRHHHHRHHRRHRHRHREHHRHHEHRHEEE 


DCM$sSs Eu is FIRST DCM SECTOR = 13. 
DCM$BG EGU IMSBe i+ SOOM COLO START ENTRY. 
DCM$LN EGIL O400H SLICM LENGTH 


SHEER EERKER EK ERE ERNE RHEE EKEMHHHRHHEHHHHRHEHHEHHHEHHREH 
; SET STACK, START [RIVE MOTOR, AND SET INVERT SW (C) # 
SHHEHHEHHKERHEHHHERHHEEHKEHKERKERKKEHHERRHREHRHKEHHREERHEEE 


IM@BGN: LXI SF. IMSBE 1 SET UP STACK. 
IN IMSXPSMTX 7; TURN ON MOTOR. 
MVI 20 ASSUME 1795. 
IN INSEL $s Ts SINFUT STATUS. 
ANI IMSBSsuso TEST USER SW 0. 
INZ IMNSORV—-IMSBGN GOTO SELECT ORV. 
MVI 2 OF FH $1771-01 INVERTS. 


S KHHEHHKEHKEKKERKHERHKKEHKEHERKE RHEE HHERHHHERHHRERHHRERHHEHHH 
5 CLEAR 177X-0O1 INTERRUPT AND SELECT DRIVE 9 # 
| HHHEKEHKHKEHKEHEHKEHHERKEHKHKERKHRERHKERKERHRERKERKEHHEHE 


IMSORVs CALL IMSS TS-IMS$BGN 7177X-O1 FORCED CLEAR. 
MVI A» IMS$BCSOURO 7;DRIVE O. ENABLED, 
OUT IM$BLScTe SOUTFUT CONTROLS. 


SHHEHEHHHHHHHEHHEHHKE RHEE EHHERHRERHR ERE RKERKERREKKEHHREHKEHE 
5 CHECK FOR DRIVE READY SIGNAL # 
5 HHEHHHHEHHRHHHHHKRKHKEHERHEHKKERERKERKHEHEHKEHHREHHREHRHREHHEHE 


CALL IM$sTS-IMtBGN GET DRIVE STATUS. 

ETA IM$EL $LCs: STORE ORIVE STATUS. 
ANI IMSOMS0NR S;CHECK DRIVE NOT ROY. 
AZ IMSHDL-IMSBGN 7IF READY, BOOT SYSTEM. 
XRA A ;ZERO A REGISTER. 

MF IM$HLT-IMSBGN SDOUBLE D SHUTOOWN. 


FHHHHHHHHEHHEHHHHEHHHHEHHHHERHKRHEHEHEHHEHKHHKEHHHHHHHHHEHEHE 
5 LOAD R/W HEAD ON SELECTED DRIVE # 
FS HHRHRHHHHEHHKHHEHHEHHHHHHKERERHEHHHHHHHEHHEHEHHEHHEHHRHHEHERE 


IMSHOL: MOV AC GET TRACK O VALLIE. 
OUT IMS$WOS TRE SET TRACK REGISTER. 
OUT IMSWOSOTA 7SEER SAME TRACK. 
LW IM$LXIY 7Z50 LXIY HEX CODE. 
LW IM$HME— IMSBGN EET NMI RETURN ADDR. 
MVI A» IM$0C$HOL. SHEAL LOAD COMMAND. 
XRA C INVERT (1771-01). 
OUT IMSWOSCMO ISSUE COMMAND. 


IM$WF I: IMF IM$WF I-IMSBGN WAIT FOR INTERRUFT., 


sHHHHHHKRKKRHKHHHKRHKRHRHHHHHHHHHHHHHHHHRHHHHHHHHHHHRHHHHHEHSH 


FIiIEL 
FiEF 
Flies 
Fic4 
Fit:7 
Fics 
FICE 
FICL 
Filo 
Fits 


Fitd 
Fins 
Fit 
FILE 
Fite 
Ficgn 
Fink 
FILF 
FIEI 
FiEz 


FIEC 


FEC 
FIEE 
FIEF 
FIFz 
FiF4 


FiFé 
FIiFY? 
FIFE 
FIFF 
F202 
F204 
F206 
F208 
Pro? 
F20B 
F2O0 
F2OE 


EAL. 
Cosooo 


E404 
27000 
20 
CAAF OG 
LEGS 
L1LOA0Q0 
COBAOO 


CaO 


SEDO 
AY 
Cs04 


ES 
ES 
ES 
DBO4 
Ay 


io 


neO4 
AY 
S27703 
FOES 
ErI45 


112500 
COBAQO 
110004 
10004 
FO 
ASO 
sEoD 
AY 
0306 
oe YS 
AY 
[a4 


5 POSITION R/W HEAD AT TRACK 
SHHEPHHHHHHHHKRAHEHHHHEHHHHYRHHEHHHHHHHHHHEHRAHHHHHHREHEHHEE 


IMSHPME = 
IM$STFs 


MV I 
CALL 
ANI 
ANZ 
DCR 


LL, IMSNRSrRe 
INSSTS-IMNSEGN 
IMSOMSTEO 
INSRSU-IMSBGN 
L 
IMSEHM-IMSRGN 
IMSGxPSSTr 

Li, IMSTMSsTr 
IMS TMR-IMSEBGN 
IMSS TF-IMNSEGN 


ZERC + 


EET MAX TRACKS. 
GET 179X STATUS. 
sTEST TRACE © BIT 
TRACE O EXIT. 

IEC ATTEMPTS. 

SCANT FIND TRE OY 

5 ISSUE STEF PULSE. 
SSTEF INTERVAL TIME. 
FALSE FOR FPERIOO, 
TRY ANOTHER TIME. 


FHHKKHKRHHHREKREHHRPERRHRRHRRHHKRHEKRRHKERHRERKRERRERHREHKKHEHREESE 


5 GET URFOQATED 


L7?7X-O1 STATUS 


+ 


SS HHHKHHHHKHRHRHRHREHKRRESRHEHRRSRHEREHRHERHHHRHKERHKRRHRKHEREREHEREER 


IM@sTS: 


MYT 
XRA 
CT 
ATHL 


A, IMEI EGET 


ie 


ఆ 


IMSWOSCMO 


IMSWOESTS 


;TYPE 4 ~ STATUS. 

INVERT (1791-01). 
SI SSUE COMMAND. 

7 DELAY 

5 DELAY 

5 DELAY 

5 DELAY 

GET STATUS 

$ INVERT (1792-01). 
RETURN TO CALLER. 


5S RHEHHHEERELHEHHH HHH HEH HHH HHH HHH EHH HHH KE HHH HHH HHH HH HH HH 


5 DISK INTERRUPT 


NMI" ROUTINE 


so 


HEHEHE EHH HHH HHH HHH HH HHH HEHE HK KH HH KH HHH HH 


MRG 


IN 
XRA 
STA 
Li 
Dill 


IMSBGN+ IMENM I 


IM@WOSsTs 
ie 
IMSBLéOCsS 
IMSXTIY 
IMSRETN 


GET 17%X STATUS. 
INVERT (1791-01). 
MARE STATINS VISIBLE. 
EXCHANGE (SP) <> IY. 
NMI RETURN (RETN). 


SR Ae 


5 HHHLKERREHRKKRKEHKKHEHERPKHHHERRHEKRHHRHHKRHEHHRHHHEHHERKRHHHKRREHHEEHRE 


5 SET-UP FOR LCM READ OPERATION 


+ 


FHRHHKKRRKRRRKRKRKRRKRKHREKRHRERKRRHRKRKRHREHHHEHEHKRHRHHHRKRRHRHHHEHHEEREHEEE 


IMBRSLS 


LXI 
CALL 
LXI 
LXI 
DW 
DW 
MVI 
XRA 
CHIT 
MVI 
XRA 
CUT 


Li, IMS TMSOBR 
INSTMR-IMSBGN 
Li, IM$BEL 

H, IMBBE 1 
IM#LXIY 
IMNSREA-IMSERGN 
A» OCMS$ss 


i. 

IMGWOSSEC 
A. IMSOCSRMS 
E 

IMSWOSCMD 


7UELAY BEFORE READ. 
CALL MS. TIMER. 
soe. BANK LENGTH 
LOM LOAD ADKRESS 
7200 LXI Y HEX CODE. 
REAM ERROR TRAP. 
IFIRST SEC OF DCM. 

5 INVERT (€1771-01> 
GET 179% SEC REG. 
READ MULTI-SECTOR. 
5 INVERT ¢1771-01). 
slSSUE 177X COMMAND. 


HHHHHRHHHHRHHPHRHRRRKHEREKRHRHRBHKHHKRKHHKEHRHRRHHHHHHRHHHRHHHHHHEH 


3 
5 ACCEPT EACH 


BYTE ANT 


STORE IN MEMORY 


# 








F210 
Pais 
F214 
F215 
F214 
e217 
Fale 
Fi? 
Fila 


F2iD 
F2iF 
F220 
FEze 
F225 


228 


F22B 
FasL 
Feo 
F232 
Faas 
P2o7 
Fea 
F238 
Fest 
FF 


Cai 


DBO4 
AY 
E69C 
MOTT 
CoOsoog 


C30 304 


SEO? 
CSBLOO 
SEO4 
C3B1O0O 
SEO! 
327603 
AF 
[200 
LE10 
7& 


SEDC: 


2 30 


QO 
CEBCOO 
iB 
7A 
BS 
C2BA00 


ra 


SHH EHEHHHKHHHHHHHHHHHRHHRHRHHHHHHHESHHHEHRRHHHRHHHRERRES 


IM#RET: IN IM#xXPSéOSH sWAIT FOR DATA. 
IN IM@WOSOTA 5 INFLIT INV DATA. 
XRA L. INVERT (279) -012. 
Moy M2 A ETRE DUM BYTE. 
INX H 5 INCREMENT POINTER. 
Cio X Li ;DECREMENT LENGTH. 
MoV AD GET HIGH REG. 
LRA Ee THEN OR-IN LOW REG. 
ANZ IMSRET-IMSBGN READ ANOTHER BYTE. 


SHHHHHHHHEHHHEHHHHHRHHEHRRHHRHHRHHEHHHHEHHHHHEHHHHRHHERSES 
5 TEST READ STATUS, TERMINATE OPERATION, GO DCM # 
SHEHHEHRHHRHHHHPHHHHEHHREHRHHHREEHRHHHESEHHEHHHHHHHHHHHHHHHES 


IMSTRS:s IN IMSWOSSTS 5 INFLT READ STATUS. 
XRA INVERT (1771-01). 
ANI IMSOMSRER TET FOR ERRORS. 
NZ IMSREB- IMSBGN READ ERROR TRAF. 
CALL IMSSTS-IMPBRGN 7 TERMINATE READ. 
IMF DCMS BGs 5 TRANSFER To DCM. 


SHHEHHKHHKEHKHHHE HHH EHR EKHHEHEHHRRHEREHREHREHHHEERHERHHEEH 
5 READ ERROR HAS BEEN DETECTED # 
SHHHEHHHKHHHEHEHHRHHRRHHKREHRKERHERHHEREHHRHEHHHEHHHEHHHERHRERE 


IM$REA: MVI A; BESROA LOAD READ ERROR CODE. 
IMF LIM$HLT~ IM$EGN GO TO ERROR HALT. 
IM$REBS MVI A» RESROB LOAD REAL ERROR CODE. 
IMF IM#HLT-IMSBGN Go TO ERROR HALT. 
IMSEHM: MVI A» BESHUM HOME ERROR CODE. 
IM$HLT: STA IMSBLSERC 7;DISPLAY ERROR COLE. 
RRA A ;ZERQ A REG, 
OUT IMSBLSsTs SUESELECT LREVE. 
IN IMBXPSMTO ;MOTOR OFF! 
HLT 5 TERMINATE. 


| KHEHHHHHEKHHHHHKHERHRHHHHHHERHHHHHHHKHEHRHRHHHKHHRHREEHHHHHEH 
> TIMER ~ WAIT FOR (BC # 1.0) MILLISECONDS # 
S HHHHKHHHHHHHHHHHHHRHHHHHHHRHRHHHHRHHREHHHHHHRERRHHREHHHRHE 


INSTMR: MVI As 220 LOAD. INT MS VALUE. 
IM#tTMX: OCR A ;DEC FOR 1 MS. 
NF EXTRA TIMING DELAY. 
WINZ IM#TMX-IMSBEGN SREFEAT FOR 1 MS, 
[i X Li TEST FOR ANOTHER Ms. 
MY 4.0 SCHECE REG OO. 
CRA E SAND REGISTER E. 
NZ IM#TMR-IMSEGN 3000 ANOTHER 1 MS. 
RET TIME FERIOO EXPIRED! 


FHHRHHKRHRHKRHHKREKRHHHHHHHHRHKRHHREHRHHRHHEHHKRHRHKRKRHKHHRHHKHRHHRE 


IMSEND: END REGIN SEND OF ASSEMBLY. 


DF OOO, F2FF 


FOOO CEs lz 


FOLO 
FoOxzO 
FOO 
F040 
FOSO 
FOE 
FO7O 
FOSO 
FOO 
FOAOQ 
FORG 


Foca ; 


FOO 
FOEO 
FOFO 
FiO0O 
Fiio 
Fiz0 
F130 
Fi4o 
Fi30 


Fié6o ' 


F170 
Fiso 
Fivo 
FiAo 
FIBRO 
Fico 
Fino 
FIEO 
FIFO 
F200 
F210 
F220 
F230 
F240 
FeSO 
F240 

270 
F2So 
F270 
FAQ 
FBO 
F2CO 
FAO 
FEO 
F2FO 


EF 


ae 
OO 
Oo 
OQ? 
OO 
a0 
Ol 
2౬ 


Fh 


C0 


OO 
Fs 
OO 
10 
Oo 


ae 


OFA 
SE 
45 
20 
OO 
a0 
OC 
AY 
20 
no 
Oo 


00, cee, 
pat Tet | 
0 


on 
if 


AP? 
C0) 
OC) 
Ay 
78 


ba 


Cm J Fay 

ts £4 

Sor ba 
8 

Sen? 


sje (ha oa G2 
2 “Ce Oe [Tf ee 


Can) 
bd 


OQ 
7S 
OO 


oe 


7 


0 
Oe 


Oo 
AY 
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